#!/usr/bin/env perl

use utf8;
use strict;
use CGI qw(:all);

#print header("text/plain");

#foreach my $param (param()){
#	print "$param: ". param($param) ."\n";
#}

print header(), start_html("This is the page title"), h1("Input parameters");

my $list_items;
foreach my $param (param()){
	$list_items .= li("$param: ". param($param));
}

print ul($list_items);

print end_html();
 
